home *** CD-ROM | disk | FTP | other *** search
/ PD ROM 1 / PD ROM Volume I - Macintosh Software from BMUG (1988).iso / Stacks / Hyper Utilities / Text Utilities / LetterWriter / background_3667.txt < prev    next >
Encoding:
Text File  |  1988-04-09  |  1.8 KB  |  94 lines
  1. -- background: 3667 from stack: in
  2. -- bmap block id: 11296
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: 
  6.  
  7.  
  8. -- part 1 (button)
  9. -- low flags: 00
  10. -- high flags: 2000
  11. -- rect: left=6 top=77 right=124 bottom=49
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 1
  15. -- font id: 0
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: New
  20. ----- HyperTalk script -----
  21. on mouseUp
  22.   visual scroll up to gray
  23.   visual scroll up
  24.   go to background Letters
  25.   visual dissolve to gray
  26.   visual dissolve
  27.   doMenu "New Card"
  28. end mouseUp
  29.  
  30.  
  31.  
  32. -- part 2 (button)
  33. -- low flags: 00
  34. -- high flags: 2000
  35. -- rect: left=6 top=129 right=173 bottom=49
  36. -- title width / last selected line: 0
  37. -- icon id / first selected line: 1005 / 1005
  38. -- text alignment: 1
  39. -- font id: 0
  40. -- text size: 12
  41. -- style flags: 0
  42. -- line height: 16
  43. -- part name: To WP
  44. ----- HyperTalk script -----
  45. on mouseUp
  46.   global WP
  47.   answer "Transfer to word processor?" with "OK" or "Cancel"
  48.   if it is "OK" then
  49.     open WP
  50.   end if
  51. end mouseUp
  52.  
  53.  
  54.  
  55. -- part 5 (button)
  56. -- low flags: 00
  57. -- high flags: 2000
  58. -- rect: left=6 top=285 right=329 bottom=49
  59. -- title width / last selected line: 0
  60. -- icon id / first selected line: 1011 / 1011
  61. -- text alignment: 1
  62. -- font id: 0
  63. -- text size: 12
  64. -- style flags: 0
  65. -- line height: 16
  66. -- part name: Home
  67. ----- HyperTalk script -----
  68. on mouseUp
  69.   visual iris close to gray
  70.   go Home
  71. end mouseUp
  72.  
  73.  
  74.  
  75. -- part 8 (button)
  76. -- low flags: 00
  77. -- high flags: 2000
  78. -- rect: left=6 top=25 right=69 bottom=49
  79. -- title width / last selected line: 0
  80. -- icon id / first selected line: 6724 / 6724
  81. -- text alignment: 1
  82. -- font id: 0
  83. -- text size: 12
  84. -- style flags: 0
  85. -- line height: 16
  86. -- part name: Next
  87. ----- HyperTalk script -----
  88. on mouseUp
  89.   visual scroll up to gray
  90.   visual scroll up
  91.   go to background Letters
  92. end mouseUp
  93.  
  94.